This is my import procedure.
library(tidyverse)
package ‘tidyverse’ was built under R version 4.0.3Registered S3 methods overwritten by 'dbplyr':
method from
print.tbl_lazy
print.tbl_sql
── Attaching packages ───────────────────────────────────────────────────────────────── tidyverse 1.3.0 ──
✓ tibble 3.1.0 ✓ dplyr 1.0.5
✓ tidyr 1.1.3 ✓ stringr 1.4.0
✓ readr 1.4.0 ✓ forcats 0.5.1
✓ purrr 0.3.4
package ‘tibble’ was built under R version 4.0.3package ‘tidyr’ was built under R version 4.0.3package ‘readr’ was built under R version 4.0.3package ‘purrr’ was built under R version 4.0.3package ‘dplyr’ was built under R version 4.0.3package ‘stringr’ was built under R version 4.0.3package ‘forcats’ was built under R version 4.0.3── Conflicts ──────────────────────────────────────────────────────────────────── tidyverse_conflicts() ──
x dplyr::filter() masks plotly::filter(), stats::filter()
x dplyr::lag() masks stats::lag()
library(ggplot2)
package ‘ggplot2’ was built under R version 4.0.3
library(plotly)
package ‘plotly’ was built under R version 4.0.3Registered S3 method overwritten by 'data.table':
method from
print.data.table
Registered S3 method overwritten by 'htmlwidgets':
method from
print.htmlwidget tools:rstudio
Attaching package: ‘plotly’
The following object is masked from ‘package:ggplot2’:
last_plot
The following object is masked from ‘package:stats’:
filter
The following object is masked from ‘package:graphics’:
layout
p <- ggplot(data = diamonds, aes(x = cut, fill = clarity)) +
geom_bar(position = "dodge")
ggplotly(p)
NA
#dplyr = filter
library(dplyr)
library(ggplot2)
ad_treatment %>%
filter(age >= 80L & age <= 85L) %>%
ggplot() +
aes(x = drug_treatment, y = mmse, colour = health_status) +
geom_boxplot(fill = "#0c4c8a") +
scale_color_hue() +
theme_minimal()